Return the appropriate indentation for this line as an int." (byte-code "È É ÊÊÊËÌ`Í#)Î
8 Ï
8)Ï
8ÐÌ!È É V I bÈ É 5`VÑ!^Ò \\Ò ÐÌ!È Ñ! Ò ÐÌ!È j ÌUÍbÒ \\,)" [block beg state indent t rexx-special-regexp rexx-cont-indent rexx-indent beginning-of-line rexx-find-environment nil parse-partial-sexp 1 0 3 4 rexx-backup-to-noncomment looking-at current-indentation] 20))
(defun rexx-backup-to-noncomment (lim) "\
Backup the point to the previous noncomment REXX line." (byte-code "Ã? /ÄÅ \"`Æ \\Y ÇÈ!ÉÊ!)(ËÌ Í#+Â` Y)" [stop lim t nil skip-chars-backward "
Return the indentation amount for line, assuming that
the current line is to be regarded as part of a block comment." (byte-code "ÃÃÄ ÅÆ!gÇUÈÉ!`Ä ÅÆ!ÊËÂ# 2 2ÌÍ!Tbi)*" [end star-start t nil beginning-of-line skip-chars-forward " " 42 skip-chars-backward "
Set mark, look for the \"do\" or \"select\" for the present block." (interactive) (byte-code "ÀÁÀ! à b" [nil set-mark-command beginning-of-line rexx-find-environment] 4))
(defun rexx-check-expansion nil "\
If abbrev was made within a comment or a string, de-abbrev!" (byte-code "ÂÃ`ÁÁ$Ä8Å8 Æ )" [state nil parse-partial-sexp 1 3 4 unexpand-abbrev] 5))
(defun rexx-indent-and-newline nil "\
New newline-and-indent which expands abbrevs before running
a regular newline-and-indent." (interactive) (byte-code "Á Â Ã " [abbrev-mode nil expand-abbrev newline-and-indent] 3))
(defun rexx-indent-newline-indent nil "\
New newline-and-indent which expands abbrevs and indent the line
before running a regular newline-and-indent." (interactive) (byte-code "ÁÂ Ã Ä " [abbrev-mode nil rexx-indent-command expand-abbrev newline-and-indent] 4))
